﻿' LibWowArmory
' by Ronald M. Clifford (roncli@roncli.com)
'
' This source code is released under the GNU Library General Public License (LGPL) Version 2.1.

Namespace roncliProductions.LibWowArmory.Character.Sheet

    ''' <summary>
    ''' A class that encapsulates achievement progress
    ''' </summary>
    ''' <remarks></remarks>
    Public Class Achievements

        ''' <summary>
        ''' The name of the achievement category
        ''' </summary>
        ''' <value></value>
        ''' <returns></returns>
        ''' <remarks></remarks>
        Public Property Name As String

        ''' <summary>
        ''' The number of achievements earned
        ''' </summary>
        ''' <value></value>
        ''' <returns></returns>
        ''' <remarks></remarks>
        Public Property Earned As Integer

        ''' <summary>
        ''' The number of achievement points earned
        ''' </summary>
        ''' <value></value>
        ''' <returns></returns>
        ''' <remarks></remarks>
        Public Property Points As Integer

        ''' <summary>
        ''' The total number of achievements in this category
        ''' </summary>
        ''' <value></value>
        ''' <returns></returns>
        ''' <remarks></remarks>
        Public Property Total As Integer

        ''' <summary>
        ''' The total number of achievement points possible in this category
        ''' </summary>
        ''' <value></value>
        ''' <returns></returns>
        ''' <remarks></remarks>
        Public Property TotalPoints As Integer

        ''' <summary>
        ''' A constructor to create new achievement cateogry information
        ''' </summary>
        ''' <param name="strName"></param>
        ''' <param name="intEarned"></param>
        ''' <param name="intPoints"></param>
        ''' <param name="intTotal"></param>
        ''' <param name="intTotalPoints"></param>
        ''' <remarks></remarks>
        Public Sub New(ByVal strName As String, ByVal intEarned As Integer, ByVal intPoints As Integer, ByVal intTotal As Integer, ByVal intTotalPoints As Integer)
            Name = strName
            Earned = intEarned
            Points = intPoints
            Total = intTotal
            TotalPoints = intTotalPoints
        End Sub

    End Class

End Namespace
